unit unDataBase;

interface

uses
  SqlExpr, SysUtils;

type
  TDataBase = class(TObject)
  private
    fConexao: TSQLConnection;
  public
    property Conexao: TSQLConnection  read fConexao write fConexao;

    constructor Create; overload;
    destructor Destroy; override;
  end;

implementation

{ TDataBase }

constructor TDataBase.Create;
begin
  inherited Create;
end;

destructor TDataBase.Destroy;
begin

  inherited;
end;

end.
 